      
c      integer nmaxdisp
      integer nmaxpl
c      parameter (nmaxdisp = 500000000) 
c       parameter (nmaxdisp = 500000000) 

      include 'nmax_disp.inc'	

      real*4 dispx(0:nmaxdisp-1),dispy(0:nmaxdisp-1),dispz(0:nmaxdisp-1)
      real*4 work(0:1)

      common /displ/ dispx,dispy,dispz,work




